**********************************************************************************************
* Reproduces Table A7
*
* Ajzenman, Elacqua, Jaimovich and Pérez-Núñez (2024)."Humans versus Chatbots: Scaling-up behavioral interventions to reduce teacher shortages"  	  		
*
**********************************************************************************************



///// Preschool Outcomes

*Preferences and enrollment in preeschool programs. Human and bot effect, with a dummy interaction of bot treatment with interesed in education/social sciences.

reg preschool_rankfirst i.grupo_gen##social_preference sexo i.dependencia_colegio top_30,r
estadd ysumm 
outreg2 using "${output}/TableA7a.tex", replace sdec(4) tex keep(i.grupo_gen##social_preference) addstat(Mean of dependent variable, e(ymean))  nocons


foreach var in preschool_proportion preschool_listed d_enroll_preschool{
	
reg `var' i.grupo_gen##social_preference sexo i.dependencia_colegio top_30,r
estadd ysumm 
outreg2 using "${output}/TableA7a.tex", append sdec(4) tex keep(i.grupo_gen##social_preference) addstat(Mean of dependent variable, e(ymean))  nocons
eststo clear
}


*Human vs Bot effect differences p-value
foreach var in preschool_rankfirst preschool_proportion preschool_listed d_enroll_preschool{
	
reg `var' i.grupo_gen##social_preference sexo i.dependencia_colegio top_30,r
test 1.grupo_gen=2.grupo_gen	
}




///// Primary Outcomes
 
*Preferences and enrollment in primary programs. Human and bot effect, with a dummy interaction of bot treatment with interesed in education/social sciences.

reg primary_rankfirst i.grupo_gen##social_preference sexo i.dependencia_colegio top_30,r
estadd ysumm 
outreg2 using "${output}/TableA7b.tex", replace sdec(4) tex  keep(i.grupo_gen##social_preference)  addstat(Mean of dependent variable, e(ymean)) label nocons


foreach var in primary_proportion primary_listed d_enroll_primary{
	
reg `var' i.grupo_gen##social_preference sexo i.dependencia_colegio top_30,r
estadd ysumm 
outreg2 using "${output}/TableA7b.tex", append sdec(4) tex  keep(i.grupo_gen##social_preference) addstat(Mean of dependent variable, e(ymean)) label nocons
eststo clear
}

*Human vs Bot effect differences p-value
foreach var in primary_rankfirst primary_proportion primary_listed d_enroll_primary{
	
reg `var' i.grupo_gen##social_preference sexo i.dependencia_colegio top_30,r
test 1.grupo_gen=2.grupo_gen	
}




///// Specialized Outcomes

*Preferences and enrollment in specialized programs. Human and bot effect, with a dummy interaction of bot treatment with interesed in education/social sciences.

reg specialized_rankfirst i.grupo_gen##social_preference sexo i.dependencia_colegio top_30,r
estadd ysumm 
outreg2 using "${output}/TableA7c.tex", replace sdec(4) tex keep(i.grupo_gen##social_preference)  addstat(Mean of dependent variable, e(ymean))  nocons

foreach var in specialized_prop specialized_listed d_enroll_specialized{
	
reg `var' i.grupo_gen##social_preference sexo i.dependencia_colegio top_30,r
estadd ysumm 
outreg2 using "${output}/TableA7c.tex", append sdec(4) tex  keep(i.grupo_gen##social_preference) addstat(Mean of dependent variable, e(ymean))  nocons
eststo clear
}

*Human vs Bot effect differences p-value
foreach var in specialized_rankfirst specialized_prop specialized_listed d_enroll_specialized{
	
reg `var' i.grupo_gen##social_preference sexo i.dependencia_colegio top_30,r
test 1.grupo_gen=2.grupo_gen	
}



*Note: Calculations of the significant difference in the bot vs human effect were manually added to the table according to the results produced by the commands run earlier in this code.